home *** CD-ROM | disk | FTP | other *** search
/ Aminet 31 / Aminet 31 (1999)(Schatztruhe)[!][Jun 1999].iso / Aminet / comm / bbs / cnet5demo.lha / cnet / rexx / dccget.rexx < prev    next >
OS/2 REXX Batch file  |  1999-03-23  |  273b  |  15 lines
  1. /* script for file-task DCC get */
  2.  
  3. options results
  4.  
  5. /* get port number from args */
  6. parse arg id
  7.  
  8. /* address CNet file-task ARexx port */
  9. if show('P', "FILETASK_RX.1") then do
  10.     address FILETASK_RX.1
  11.  
  12.     /* Tell file-task to get an offered DCC file */
  13.     DCCGET 'DCCID='id
  14. end
  15.